home *** CD-ROM | disk | FTP | other *** search
Text File | 1993-11-30 | 1.8 KB | 69 lines | [TEXT/MPS ] |
- ; File: Palettes.a
- ;
- ; Copyright: © 1983-1993 by Apple Computer, Inc.
- ; All rights reserved.
- ;
- ; Version: System 7.1 for ETO #11
- ; Created: Tuesday, March 30, 1993 18:00
- ;
- ;___________________________________________________________________________
-
- IF &TYPE('__INCLUDINGPALETTES__') = 'UNDEFINED' THEN
- __INCLUDINGPALETTES__ SET 1
-
- ; Palette Manager equates
-
- ; Usage constants
- pmCourteous EQU $0000
- pmDithered EQU $0001
- pmTolerant EQU $0002
- pmAnimated EQU $0004
- pmExplicit EQU $0008
-
- pmWhite EQU $0010
- pmBlack EQU $0020
-
- pmInhibitG2 EQU $0100
- pmInhibitC2 EQU $0200
- pmInhibitG4 EQU $0400
- pmInhibitC4 EQU $0800
- pmInhibitG8 EQU $1000
- pmInhibitC8 EQU $2000
-
- ; bit numbers for above
-
- inhibitG2Bit EQU 8
- inhibitC2Bit EQU 9
- inhibitG4Bit EQU 10
- inhibitC4Bit EQU 11
- inhibitG8Bit EQU 12
- inhibitC8Bit EQU 13
-
- ; palette update types
-
- noPaletteUpdates EQU 0
- allBackPaletteUpdates EQU 1
- allForePaletteUpdates EQU 2
- allPaletteUpdates EQU 3
-
- ; ColorInfo structure ; Always access these fields through Palette manager calls!
-
- ciRGB EQU $0000 ; RGBColor [short] * 3
- ciUsage EQU $0006 ; usage [short]
- ciTolerance EQU $0008 ; tolerance value [short]
- ciDataFields EQU $000A ; three words of private data
- ciSize EQU $0010 ; size of the ColorInfo data structure
-
- ; Palette structure ; Always access these fields through Palette manager calls!
-
- pmEntries EQU $0000 ; entries in pmInfo [short]
- pmDataFields EQU $0002 ; seven words of private data
- pmInfo EQU $0010 ; ColorInfo's [ciSize] * pmEntries
- pmHdrSize EQU $0010 ; size of Palette header
-
- ; Palette resource structure
-
- plttEntries EQU $0000 ; entries in palette resource [short]
- plltUpdates EQU $0002 ; value passed to SetPalette [short]
-
- ENDIF ; ...already included